(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 10.3' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[     19777,        778]
NotebookOptionsPosition[     15270,        630]
NotebookOutlinePosition[     17351,        686]
CellTagsIndexPosition[     17266,        681]
WindowTitle->FCHN
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
   {Cell["FEYN CALC SYMBOL", "PacletNameCell"], Cell[TextData[Cell[BoxData[
     ActionMenuBox[
      FrameBox[
       InterpretationBox[Cell[TextData[{
         "URL",
         StyleBox[" \[FilledDownTriangle]", "AnchorBarArrow",
          StripOnInput->False]
        }]],
        TextCell[
         Row[{"URL", 
           Style[" \[FilledDownTriangle]", "AnchorBarArrow"]}]]],
       StripOnInput->False], {"\<\"FeynCalc/ref/FCHN\"\>":>
      None, "\<\"Copy Wolfram Documentation Center URL\"\>":>
      Module[{DocumentationSearch`Private`nb$}, 
       DocumentationSearch`Private`nb$ = NotebookPut[
          Notebook[{
            Cell["FeynCalc/ref/FCHN"]}, Visible -> False]]; 
       SelectionMove[DocumentationSearch`Private`nb$, All, Notebook]; 
       FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"]; 
       NotebookClose[DocumentationSearch`Private`nb$]; Null], 
      Delimiter, "\<\"Copy web URL\"\>":>
      Module[{DocumentationSearch`Private`nb$}, 
       DocumentationSearch`Private`nb$ = NotebookPut[
          Notebook[{
            Cell[
             BoxData[
              MakeBoxes[
               Hyperlink[
               "http://reference.wolfram.com/language/FeynCalc/ref/FCHN.html"]\
, StandardForm]], "Input", TextClipboardType -> "PlainText"]}, Visible -> 
           False]]; SelectionMove[
        DocumentationSearch`Private`nb$, All, Notebook]; 
       FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"]; 
       NotebookClose[DocumentationSearch`Private`nb$]; 
       Null], "\<\"Go to web URL\"\>":>FrontEndExecute[{
        NotebookLocate[{
          URL[
           StringJoin[
            If[
             TrueQ[DocumentationBuild`Make`Private`wsmlinkQ$104539], 
             "http://reference.wolfram.com/system-modeler/", 
             "http://reference.wolfram.com/language/"], "FeynCalc/ref/FCHN", 
            ".html"]], None}]}]},
      Appearance->None,
      MenuAppearance->Automatic,
      MenuStyle->"URLMenu"]],
     LineSpacing->{1.4, 0}]], "AnchorBar"]}
  }]], "AnchorBarGrid",
 GridBoxOptions->{GridBoxItemSize->{"Columns" -> {
     Scaled[0.65], {
      Scaled[0.34]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
   "RowsIndexed" -> {}}},
 CellID->1],

Cell[TextData[{
 Cell["FCHN", "ObjectName"],
 Cell[BoxData[
  InterpretationBox[
   StyleBox[
    GraphicsBox[{},
     BaselinePosition->Baseline,
     ImageSize->{8, 0}],
    CacheGraphics->False],
   Spacer[8]]]],
 Cell[BoxData[""], "ObjectNameTranslation"]
}], "ObjectNameGrid"],

Cell[BoxData[GridBox[{
   {"", Cell[TextData[{
     Cell[BoxData[
      RowBox[{"FCHN", "[", 
       RowBox[{"x", ",", "i", ",", "j"}], "]"}]], "InlineFormula"],
     " \[LineSeparator]is a chain of Dirac matrices x and is transformed into \
FermionicChain[FCI[x],DiracIndex[i],DiracIndex[j]] by FeynCalcInternal."
    }]]}
  }]], "Usage",
 GridBoxOptions->{
 GridBoxBackground->{
  "Columns" -> {{None}}, "ColumnsIndexed" -> {}, "Rows" -> {{None}}, 
   "RowsIndexed" -> {}}},
 CellID->982511436],

Cell[CellGroupData[{

Cell[TextData[{
 Cell[BoxData[
  InterpretationBox[
   StyleBox[
    GraphicsBox[{},
     BaselinePosition->Baseline,
     ImageSize->{6, 0}],
    CacheGraphics->False],
   Spacer[6]]]],
 "Examples",
 "\[NonBreakingSpace]\[NonBreakingSpace]",
 Cell["(1)", "ExampleCount"]
}], "PrimaryExamplesSection",
 WholeCellGroupOpener->True,
 CellTags->"PrimaryExamplesSection",
 CellID->361182983],

Cell[CellGroupData[{

Cell[TextData[{
 "Basic Examples",
 "\[NonBreakingSpace]\[NonBreakingSpace]",
 Cell["(1)", "ExampleCount"]
}], "ExampleSection", "ExampleSection",
 WholeCellGroupOpener->True,
 CellID->1795734793],

Cell["A standalone Dirac matrix with open Dirac indices", "Notes",
 CellID->562724937],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"FCHN", "[", 
  RowBox[{
   RowBox[{"GAD", "[", "\[Mu]", "]"}], ",", "i", ",", "j"}], "]"}]], "Input",
 CellLabel->"In[1]:=",
 CellID->883461262],

Cell[BoxData[
 FormBox[
  SubscriptBox[
   RowBox[{"(", 
    FormBox[
     FormBox[
      SuperscriptBox["\[Gamma]", 
       FormBox[
        FormBox["\[Mu]",
         TraditionalForm],
        TraditionalForm]],
      TraditionalForm],
     TraditionalForm], ")"}], 
   RowBox[{
    FormBox[
     FormBox["i",
      TraditionalForm],
     TraditionalForm], 
    FormBox[
     FormBox["j",
      TraditionalForm],
     TraditionalForm]}]], TraditionalForm]], "Output",
 ImageSize->{56, 19},
 ImageMargins->{{0, 0}, {0, 0}},
 ImageRegion->{{0, 1}, {0, 1}},
 CellLabel->"Out[1]=",
 CellID->1366821851]
}, Open  ]],

Cell["A chain of Dirac matrices with open Dirac indices", "Notes",
 CellID->1618780636],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"FCHN", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"GAD", "[", "\[Mu]", "]"}], ".", 
    RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",", "i", ",", "j"}], 
  "]"}]], "Input",
 CellLabel->"In[2]:=",
 CellID->2010253364],

Cell[BoxData[
 FormBox[
  SubscriptBox[
   RowBox[{"(", 
    FormBox[
     RowBox[{
      FormBox[
       SuperscriptBox["\[Gamma]", 
        FormBox[
         FormBox["\[Mu]",
          TraditionalForm],
         TraditionalForm]],
       TraditionalForm], ".", 
      FormBox[
       SuperscriptBox["\[Gamma]", 
        FormBox[
         FormBox["\[Nu]",
          TraditionalForm],
         TraditionalForm]],
       TraditionalForm]}],
     TraditionalForm], ")"}], 
   RowBox[{
    FormBox[
     FormBox["i",
      TraditionalForm],
     TraditionalForm], 
    FormBox[
     FormBox["j",
      TraditionalForm],
     TraditionalForm]}]], TraditionalForm]], "Output",
 ImageSize->{78, 19},
 ImageMargins->{{0, 0}, {0, 0}},
 ImageRegion->{{0, 1}, {0, 1}},
 CellLabel->"Out[2]=",
 CellID->782904144]
}, Open  ]],

Cell[TextData[{
 "A single ",
 Cell[BoxData[
  OverscriptBox["u", "-"]], "InlineFormula"],
 " spinor with an open Dirac index"
}], "Notes",
 CellID->1250331575],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"FCHN", "[", 
  RowBox[{
   RowBox[{"SpinorUBar", "[", 
    RowBox[{"p", ",", "m"}], "]"}], ",", "i"}], "]"}]], "Input",
 CellLabel->"In[3]:=",
 CellID->1134519360],

Cell[BoxData[
 FormBox[
  SubscriptBox[
   RowBox[{"(", 
    FormBox[
     RowBox[{
      OverscriptBox["u", "_"], "(", 
      FormBox["p",
       TraditionalForm], ",", 
      FormBox["m",
       TraditionalForm], ")"}],
     TraditionalForm], ")"}], 
   FormBox[
    FormBox["i",
     TraditionalForm],
    TraditionalForm]], TraditionalForm]], "Output",
 ImageSize->{86, 17},
 ImageMargins->{{0, 0}, {0, 0}},
 ImageRegion->{{0, 1}, {0, 1}},
 CellLabel->"Out[3]=",
 CellID->1410852026]
}, Open  ]],

Cell[TextData[{
 "A single ",
 Cell[BoxData[
  OverscriptBox["v", "-"]], "InlineFormula"],
 " spinor with an open Dirac index"
}], "Notes",
 CellID->63600432],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"FCHN", "[", 
  RowBox[{
   RowBox[{"SpinorVBar", "[", 
    RowBox[{"p", ",", "m"}], "]"}], ",", "i"}], "]"}]], "Input",
 CellLabel->"In[4]:=",
 CellID->443709048],

Cell[BoxData[
 FormBox[
  SubscriptBox[
   RowBox[{"(", 
    FormBox[
     RowBox[{
      OverscriptBox["v", "_"], "(", 
      FormBox["p",
       TraditionalForm], ",", 
      FormBox["m",
       TraditionalForm], ")"}],
     TraditionalForm], ")"}], 
   FormBox[
    FormBox["i",
     TraditionalForm],
    TraditionalForm]], TraditionalForm]], "Output",
 ImageSize->{86, 17},
 ImageMargins->{{0, 0}, {0, 0}},
 ImageRegion->{{0, 1}, {0, 1}},
 CellLabel->"Out[4]=",
 CellID->87501366]
}, Open  ]],

Cell[TextData[{
 "A single ",
 Cell[BoxData["u"], "InlineFormula"],
 " spinor with an open Dirac index"
}], "Notes",
 CellID->1458298795],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"FCHN", "[", 
  RowBox[{"i", ",", 
   RowBox[{"SpinorU", "[", 
    RowBox[{"p", ",", "m"}], "]"}]}], "]"}]], "Input",
 CellLabel->"In[5]:=",
 CellID->791949561],

Cell[BoxData[
 FormBox[
  SubscriptBox[
   RowBox[{"(", 
    FormBox[
     RowBox[{"u", "(", 
      FormBox["p",
       TraditionalForm], ",", 
      FormBox["m",
       TraditionalForm], ")"}],
     TraditionalForm], ")"}], 
   FormBox[
    FormBox["i",
     TraditionalForm],
    TraditionalForm]], TraditionalForm]], "Output",
 ImageSize->{84, 17},
 ImageMargins->{{0, 0}, {0, 0}},
 ImageRegion->{{0, 1}, {0, 1}},
 CellLabel->"Out[5]=",
 CellID->450133123]
}, Open  ]],

Cell[TextData[{
 "A single ",
 Cell[BoxData["v"], "InlineFormula"],
 " spinor with an open Dirac index"
}], "Notes",
 CellID->2030312156],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"FCHN", "[", 
  RowBox[{"i", ",", 
   RowBox[{"SpinorV", "[", 
    RowBox[{"p", ",", "m"}], "]"}]}], "]"}]], "Input",
 CellLabel->"In[6]:=",
 CellID->227593440],

Cell[BoxData[
 FormBox[
  SubscriptBox[
   RowBox[{"(", 
    FormBox[
     RowBox[{"v", "(", 
      FormBox["p",
       TraditionalForm], ",", 
      FormBox["m",
       TraditionalForm], ")"}],
     TraditionalForm], ")"}], 
   FormBox[
    FormBox["i",
     TraditionalForm],
    TraditionalForm]], TraditionalForm]], "Output",
 ImageSize->{84, 17},
 ImageMargins->{{0, 0}, {0, 0}},
 ImageRegion->{{0, 1}, {0, 1}},
 CellLabel->"Out[6]=",
 CellID->1554163657]
}, Open  ]],

Cell[TextData[{
 " ",
 Cell[BoxData[
  OverscriptBox["u", "-"]], "InlineFormula"],
 " spinor contracted with a chain of Dirac matrices"
}], "Notes",
 CellID->1268031370],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"FCHN", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"GAD", "[", "\[Mu]", "]"}], ".", 
    RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",", 
   RowBox[{"SpinorUBar", "[", 
    RowBox[{"p", ",", "m"}], "]"}], ",", "j"}], "]"}]], "Input",
 CellLabel->"In[7]:=",
 CellID->1380755633],

Cell[BoxData[
 FormBox[
  SubscriptBox[
   RowBox[{"(", 
    FormBox[
     RowBox[{
      OverscriptBox["u", "_"], "(", 
      FormBox["p",
       TraditionalForm], ",", 
      FormBox["m",
       TraditionalForm], ")"}],
     TraditionalForm], ".", 
    FormBox[
     RowBox[{
      FormBox[
       SuperscriptBox["\[Gamma]", 
        FormBox[
         FormBox["\[Mu]",
          TraditionalForm],
         TraditionalForm]],
       TraditionalForm], ".", 
      FormBox[
       SuperscriptBox["\[Gamma]", 
        FormBox[
         FormBox["\[Nu]",
          TraditionalForm],
         TraditionalForm]],
       TraditionalForm]}],
     TraditionalForm], ")"}], 
   FormBox[
    FormBox["j",
     TraditionalForm],
    TraditionalForm]], TraditionalForm]], "Output",
 ImageSize->{132, 19},
 ImageMargins->{{0, 0}, {0, 0}},
 ImageRegion->{{0, 1}, {0, 1}},
 CellLabel->"Out[7]=",
 CellID->404025824]
}, Open  ]],

Cell[TextData[{
 " ",
 Cell[BoxData[
  OverscriptBox["v", "-"]], "InlineFormula"],
 " spinor contracted with a chain of Dirac matrices"
}], "Notes",
 CellID->867998080],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"FCHN", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"GAD", "[", "\[Mu]", "]"}], ".", 
    RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",", 
   RowBox[{"SpinorVBar", "[", 
    RowBox[{"p", ",", "m"}], "]"}], ",", "j"}], "]"}]], "Input",
 CellLabel->"In[8]:=",
 CellID->1948837227],

Cell[BoxData[
 FormBox[
  SubscriptBox[
   RowBox[{"(", 
    FormBox[
     RowBox[{
      OverscriptBox["v", "_"], "(", 
      FormBox["p",
       TraditionalForm], ",", 
      FormBox["m",
       TraditionalForm], ")"}],
     TraditionalForm], ".", 
    FormBox[
     RowBox[{
      FormBox[
       SuperscriptBox["\[Gamma]", 
        FormBox[
         FormBox["\[Mu]",
          TraditionalForm],
         TraditionalForm]],
       TraditionalForm], ".", 
      FormBox[
       SuperscriptBox["\[Gamma]", 
        FormBox[
         FormBox["\[Nu]",
          TraditionalForm],
         TraditionalForm]],
       TraditionalForm]}],
     TraditionalForm], ")"}], 
   FormBox[
    FormBox["j",
     TraditionalForm],
    TraditionalForm]], TraditionalForm]], "Output",
 ImageSize->{132, 19},
 ImageMargins->{{0, 0}, {0, 0}},
 ImageRegion->{{0, 1}, {0, 1}},
 CellLabel->"Out[8]=",
 CellID->1888289142]
}, Open  ]],

Cell[TextData[{
 " ",
 Cell[BoxData["u"], "InlineFormula"],
 " spinor contracted with a chain of Dirac matrices"
}], "Notes",
 CellID->1238042528],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"FCHN", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"GAD", "[", "\[Mu]", "]"}], ".", 
    RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",", "i", ",", 
   RowBox[{"SpinorU", "[", 
    RowBox[{"p", ",", "m"}], "]"}]}], "]"}]], "Input",
 CellLabel->"In[9]:=",
 CellID->1936823151],

Cell[BoxData[
 FormBox[
  SubscriptBox[
   RowBox[{"(", 
    FormBox[
     RowBox[{
      FormBox[
       SuperscriptBox["\[Gamma]", 
        FormBox[
         FormBox["\[Mu]",
          TraditionalForm],
         TraditionalForm]],
       TraditionalForm], ".", 
      FormBox[
       SuperscriptBox["\[Gamma]", 
        FormBox[
         FormBox["\[Nu]",
          TraditionalForm],
         TraditionalForm]],
       TraditionalForm]}],
     TraditionalForm], ".", 
    FormBox[
     RowBox[{"u", "(", 
      FormBox["p",
       TraditionalForm], ",", 
      FormBox["m",
       TraditionalForm], ")"}],
     TraditionalForm], ")"}], 
   FormBox[
    FormBox["i",
     TraditionalForm],
    TraditionalForm]], TraditionalForm]], "Output",
 ImageSize->{129, 17},
 ImageMargins->{{0, 0}, {0, 0}},
 ImageRegion->{{0, 1}, {0, 1}},
 CellLabel->"Out[9]=",
 CellID->658668713]
}, Open  ]],

Cell[TextData[{
 " ",
 Cell[BoxData["v"], "InlineFormula"],
 " spinor contracted with a chain of Dirac matrices"
}], "Notes",
 CellID->1861495104],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"FCHN", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"GAD", "[", "\[Mu]", "]"}], ".", 
    RowBox[{"GAD", "[", "\[Nu]", "]"}]}], ",", "i", ",", 
   RowBox[{"SpinorV", "[", 
    RowBox[{"p", ",", "m"}], "]"}]}], "]"}]], "Input",
 CellLabel->"In[10]:=",
 CellID->1335889439],

Cell[BoxData[
 FormBox[
  SubscriptBox[
   RowBox[{"(", 
    FormBox[
     RowBox[{
      FormBox[
       SuperscriptBox["\[Gamma]", 
        FormBox[
         FormBox["\[Mu]",
          TraditionalForm],
         TraditionalForm]],
       TraditionalForm], ".", 
      FormBox[
       SuperscriptBox["\[Gamma]", 
        FormBox[
         FormBox["\[Nu]",
          TraditionalForm],
         TraditionalForm]],
       TraditionalForm]}],
     TraditionalForm], ".", 
    FormBox[
     RowBox[{"v", "(", 
      FormBox["p",
       TraditionalForm], ",", 
      FormBox["m",
       TraditionalForm], ")"}],
     TraditionalForm], ")"}], 
   FormBox[
    FormBox["i",
     TraditionalForm],
    TraditionalForm]], TraditionalForm]], "Output",
 ImageSize->{129, 17},
 ImageMargins->{{0, 0}, {0, 0}},
 ImageRegion->{{0, 1}, {0, 1}},
 CellLabel->"Out[10]=",
 CellID->2035121680]
}, Open  ]]
}, Open  ]]
}, Open  ]],

Cell[" ", "FooterCell"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{725, 750},
WindowMargins->{{-10, Automatic}, {Automatic, -8}},
WindowTitle->"FCHN",
TaggingRules->{
 "ModificationHighlight" -> False, "ColorType" -> "SymbolColor", "LinkTrails" -> 
  GridBox[{{
      RowBox[{
        ButtonBox[
        "FeynCalc", ButtonData -> "paclet:FeynCalc/guide/FeynCalc", 
         BaseStyle -> {"Link", "DockedLinkTrail"}]}]}}, ColumnAlignments -> 
    Left], "HasOptions" -> False, "ExampleCounter" -> 1, "NeedPlatMsgIn" -> 
  None, "RootCaptions" -> "", 
  "Metadata" -> {
   "built" -> "{2019, 3, 29, 17, 48, 14.034249}", 
    "history" -> {"9.3", "", "", ""}, "context" -> "FeynCalc`", 
    "keywords" -> {}, "specialkeywords" -> {}, 
    "tutorialcollectionlinks" -> {}, "index" -> True, "label" -> 
    "Feyn Calc Symbol", "language" -> "en", "paclet" -> "FeynCalc", "status" -> 
    "None", "summary" -> 
    "FCHN[x, i, j] is a chain of Dirac matrices x and is transformed into \
FermionicChain[FCI[x],DiracIndex[i],DiracIndex[j]] by FeynCalcInternal.", 
    "synonyms" -> {}, "tabletags" -> {}, "title" -> "FCHN", "titlemodifier" -> 
    "", "windowtitle" -> "FCHN", "type" -> "Symbol", "uri" -> 
    "FeynCalc/ref/FCHN"}, "SearchTextTranslated" -> ""},
CellContext->"Global`",
FrontEndVersion->"10.3 for Linux x86 (64-bit) (December 10, 2015)",
StyleDefinitions->Notebook[{
   Cell[
    StyleData[
    StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb"]]], 
   Cell[
    StyleData["Input"], CellContext -> "Global`"], 
   Cell[
    StyleData["Output"], CellContext -> "Global`"]}, Visible -> False, 
  FrontEndVersion -> "10.3 for Linux x86 (64-bit) (December 10, 2015)", 
  StyleDefinitions -> "Default.nb"]
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
 "PrimaryExamplesSection"->{
  Cell[3641, 106, 387, 15, 31, "PrimaryExamplesSection",
   CellTags->"PrimaryExamplesSection",
   CellID->361182983]}
 }
*)
(*CellTagsIndex
CellTagsIndex->{
 {"PrimaryExamplesSection", 17123, 674}
 }
*)
(*NotebookFileOutline
Notebook[{
Cell[576, 21, 2257, 53, 50, "AnchorBarGrid",
 CellID->1],
Cell[2836, 76, 281, 11, 44, "ObjectNameGrid"],
Cell[3120, 89, 496, 13, 99, "Usage",
 CellID->982511436],
Cell[CellGroupData[{
Cell[3641, 106, 387, 15, 31, "PrimaryExamplesSection",
 CellTags->"PrimaryExamplesSection",
 CellID->361182983],
Cell[CellGroupData[{
Cell[4053, 125, 196, 6, 25, "ExampleSection",
 CellID->1795734793],
Cell[4252, 133, 86, 1, 31, "Notes",
 CellID->562724937],
Cell[CellGroupData[{
Cell[4363, 138, 168, 5, 27, "Input",
 CellID->883461262],
Cell[4534, 145, 599, 26, 40, "Output",
 CellID->1366821851]
}, Open  ]],
Cell[5148, 174, 87, 1, 31, "Notes",
 CellID->1618780636],
Cell[CellGroupData[{
Cell[5260, 179, 233, 8, 27, "Input",
 CellID->2010253364],
Cell[5496, 189, 801, 34, 40, "Output",
 CellID->782904144]
}, Open  ]],
Cell[6312, 226, 160, 6, 31, "Notes",
 CellID->1250331575],
Cell[CellGroupData[{
Cell[6497, 236, 187, 6, 27, "Input",
 CellID->1134519360],
Cell[6687, 244, 487, 20, 38, "Output",
 CellID->1410852026]
}, Open  ]],
Cell[7189, 267, 158, 6, 31, "Notes",
 CellID->63600432],
Cell[CellGroupData[{
Cell[7372, 277, 186, 6, 27, "Input",
 CellID->443709048],
Cell[7561, 285, 485, 20, 38, "Output",
 CellID->87501366]
}, Open  ]],
Cell[8061, 308, 137, 5, 31, "Notes",
 CellID->1458298795],
Cell[CellGroupData[{
Cell[8223, 317, 183, 6, 27, "Input",
 CellID->791949561],
Cell[8409, 325, 459, 19, 38, "Output",
 CellID->450133123]
}, Open  ]],
Cell[8883, 347, 137, 5, 31, "Notes",
 CellID->2030312156],
Cell[CellGroupData[{
Cell[9045, 356, 183, 6, 27, "Input",
 CellID->227593440],
Cell[9231, 364, 460, 19, 38, "Output",
 CellID->1554163657]
}, Open  ]],
Cell[9706, 386, 169, 6, 31, "Notes",
 CellID->1268031370],
Cell[CellGroupData[{
Cell[9900, 396, 293, 9, 27, "Input",
 CellID->1380755633],
Cell[10196, 407, 899, 37, 40, "Output",
 CellID->404025824]
}, Open  ]],
Cell[11110, 447, 168, 6, 31, "Notes",
 CellID->867998080],
Cell[CellGroupData[{
Cell[11303, 457, 293, 9, 27, "Input",
 CellID->1948837227],
Cell[11599, 468, 900, 37, 40, "Output",
 CellID->1888289142]
}, Open  ]],
Cell[12514, 508, 146, 5, 31, "Notes",
 CellID->1238042528],
Cell[CellGroupData[{
Cell[12685, 517, 290, 9, 27, "Input",
 CellID->1936823151],
Cell[12978, 528, 872, 36, 38, "Output",
 CellID->658668713]
}, Open  ]],
Cell[13865, 567, 146, 5, 31, "Notes",
 CellID->1861495104],
Cell[CellGroupData[{
Cell[14036, 576, 291, 9, 27, "Input",
 CellID->1335889439],
Cell[14330, 587, 874, 36, 38, "Output",
 CellID->2035121680]
}, Open  ]]
}, Open  ]]
}, Open  ]],
Cell[15243, 628, 23, 0, 40, "FooterCell"]
}
]
*)

(* End of internal cache information *)

